Developer CD Series 1996 June: Reference Library

home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1996 June: Reference Library / Dev.CD Jun 96 RL / Dev.CD Jun 96 RL.toast / Technical Documentation / develop / develop Issue 10 / develop Issue 10 code / Picture Utilities.sea / Picture Utilities / sample shell.c < prev next >
MacBinary | 1992-04-08 | 9.3 KB | [TEXT/KAHL]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
browse contents |
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).
Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	Compact Compressed (Unix) `(archive/compact)`	ext	Supported
`1%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Wed Apr 8 18:02:35 1992, modified Wed Apr 8 18:02:35 1992, creator Think C, type ASCII, 8415 bytes "sample shell.c" , at 0x215f 818 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	dearkID	deark: macbinary	default
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[KAHL]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0e 73 61 6d 70 6c 65 | 20 73 68 65 6c 6c 2e 63 |..sample| shell.c|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4b 41 48 | 4c 01 00 00 00 00 00 00 |.TEXTKAH|L.......|
|00000050| 00 00 00 00 00 20 df 00 | 00 03 32 a6 09 1d fb a6 |..... ..|..2.....|
|00000060| 09 1d fb 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 b0 47 00 00 |........|.....G..|
|00000080| 23 69 6e 63 6c 75 64 65 | 20 3c 4d 61 63 48 65 61 |#include| <MacHea|
|00000090| 64 65 72 73 3e 0d 23 69 | 6e 63 6c 75 64 65 20 3c |ders>.#i|nclude <|
|000000a0| 50 61 6c 65 74 74 65 73 | 2e 68 3e 0d 23 69 6e 63 |Palettes|.h>.#inc|
|000000b0| 6c 75 64 65 20 3c 50 69 | 63 74 55 74 69 6c 2e 68 |lude <Pi|ctUtil.h|
|000000c0| 3e 0d 23 69 6e 63 6c 75 | 64 65 20 3c 73 74 64 69 |>.#inclu|de <stdi|
|000000d0| 6f 2e 68 3e 0d 23 69 6e | 63 6c 75 64 65 20 3c 73 |o.h>.#in|clude <s|
|000000e0| 74 72 69 6e 67 2e 68 3e | 0d 23 69 6e 63 6c 75 64 |tring.h>|.#includ|
|000000f0| 65 20 22 73 61 6d 70 6c | 65 20 73 68 65 6c 6c 2e |e "sampl|e shell.|
|00000100| 68 22 0d 23 69 6e 63 6c | 75 64 65 20 22 73 61 6d |h".#incl|ude "sam|
|00000110| 70 6c 65 20 75 74 69 6c | 69 74 69 65 73 2e 68 22 |ple util|ities.h"|
|00000120| 0d 0d 0d 23 64 65 66 69 | 6e 65 09 63 6f 6c 6f 72 |...#defi|ne.color|
|00000130| 73 54 6f 52 65 71 75 65 | 73 74 09 31 36 0d 23 64 |sToReque|st.16.#d|
|00000140| 65 66 69 6e 65 09 73 74 | 61 6e 64 61 72 64 43 6c |efine.st|andardCl|
|00000150| 75 74 49 44 09 09 34 0d | 0d 0d 4d 65 6e 75 48 61 |utID..4.|..MenuHa|
|00000160| 6e 64 6c 65 09 6d 79 4d | 65 6e 75 73 5b 33 5d 3b |ndle.myM|enus[3];|
|00000170| 0d 42 6f 6f 6c 65 61 6e | 09 09 71 75 69 74 74 69 |.Boolean|..quitti|
|00000180| 6e 67 20 3d 20 66 61 6c | 73 65 3b 0d 0d 0d 74 79 |ng = fal|se;...ty|
|00000190| 70 65 64 65 66 20 73 74 | 72 75 63 74 20 77 69 6e |pedef st|ruct win|
|000001a0| 64 6f 77 44 61 74 61 20 | 7b 0d 09 64 69 73 6b 50 |dowData |{..diskP|
|000001b0| 69 63 74 75 72 65 09 63 | 6f 6e 74 65 6e 74 50 69 |icture.c|ontentPi|
|000001c0| 63 74 75 72 65 3b 0d 7d | 20 77 69 6e 64 6f 77 44 |cture;.}| windowD|
|000001d0| 61 74 61 3b 0d 0d 0d 76 | 6f 69 64 20 4d 61 6b 65 |ata;...v|oid Make|
|000001e0| 4e 65 77 57 69 6e 64 6f | 77 28 76 6f 69 64 29 3b |NewWindo|w(void);|
|000001f0| 0d 0d 0d 76 6f 69 64 20 | 6d 61 69 6e 28 76 6f 69 |...void |main(voi|
|00000200| 64 29 0d 7b 0d 09 49 6e | 69 74 47 72 61 66 28 26 |d).{..In|itGraf(&|
|00000210| 74 68 65 50 6f 72 74 29 | 3b 0d 09 49 6e 69 74 46 |thePort)|;..InitF|
|00000220| 6f 6e 74 73 28 29 3b 0d | 09 46 6c 75 73 68 45 76 |onts();.|.FlushEv|
|00000230| 65 6e 74 73 28 65 76 65 | 72 79 45 76 65 6e 74 2c |ents(eve|ryEvent,|
|00000240| 20 30 29 3b 0d 09 49 6e | 69 74 57 69 6e 64 6f 77 | 0);..In|itWindow|
|00000250| 73 28 29 3b 0d 09 49 6e | 69 74 4d 65 6e 75 73 28 |s();..In|itMenus(|
|00000260| 29 3b 0d 09 54 45 49 6e | 69 74 28 29 3b 0d 09 49 |);..TEIn|it();..I|
|00000270| 6e 69 74 44 69 61 6c 6f | 67 73 28 30 4c 29 3b 0d |nitDialo|gs(0L);.|
|00000280| 09 49 6e 69 74 43 75 72 | 73 6f 72 28 29 3b 0d 09 |.InitCur|sor();..|
|00000290| 4d 61 78 41 70 70 6c 5a | 6f 6e 65 28 29 3b 0d 0d |MaxApplZ|one();..|
|000002a0| 09 69 66 28 20 47 65 74 | 52 65 73 6f 75 72 63 65 |.if( Get|Resource|
|000002b0| 28 27 4d 45 4e 55 27 2c | 20 66 69 6c 65 49 44 29 |('MENU',| fileID)|
|000002c0| 3d 3d 30 20 29 20 7b 0d | 09 09 53 79 73 42 65 65 |==0 ) {.|..SysBee|
|000002d0| 70 28 32 30 29 3b 0d 09 | 09 43 61 6e 74 4f 70 65 |p(20);..|.CantOpe|
|000002e0| 6e 28 29 3b 0d 09 09 72 | 65 74 75 72 6e 3b 0d 09 |n();...r|eturn;..|
|000002f0| 7d 0d 09 0d 09 53 65 74 | 55 70 4d 65 6e 75 73 28 |}....Set|UpMenus(|
|00000300| 29 3b 0d 09 53 65 74 55 | 70 57 69 6e 64 6f 77 73 |);..SetU|pWindows|
|00000310| 28 29 3b 0d 0d 09 77 68 | 69 6c 65 28 20 21 71 75 |();...wh|ile( !qu|
|00000320| 69 74 74 69 6e 67 20 29 | 0d 09 09 4d 61 69 6e 45 |itting )|...MainE|
|00000330| 76 65 6e 74 28 29 3b 0d | 7d 0d 0d 0d 76 6f 69 64 |vent();.|}...void|
|00000340| 20 4d 61 69 6e 45 76 65 | 6e 74 28 76 6f 69 64 29 | MainEve|nt(void)|
|00000350| 0d 7b 0d 09 45 76 65 6e | 74 52 65 63 6f 72 64 20 |.{..Even|tRecord |
|00000360| 6d 79 45 76 65 6e 74 3b | 0d 09 57 69 6e 64 6f 77 |myEvent;|..Window|
|00000370| 50 74 72 20 77 68 69 63 | 68 57 69 6e 64 6f 77 3b |Ptr whic|hWindow;|
|00000380| 0d 09 73 68 6f 72 74 20 | 77 69 6e 64 6f 77 50 61 |..short |windowPa|
|00000390| 72 74 3b 0d 0d 09 4d 61 | 69 6e 74 61 69 6e 4d 65 |rt;...Ma|intainMe|
|000003a0| 6e 75 73 28 29 3b 0d 09 | 53 79 73 74 65 6d 54 61 |nus();..|SystemTa|
|000003b0| 73 6b 28 29 3b 0d 09 69 | 66 28 20 47 65 74 4e 65 |sk();..i|f( GetNe|
|000003c0| 78 74 45 76 65 6e 74 28 | 65 76 65 72 79 45 76 65 |xtEvent(|everyEve|
|000003d0| 6e 74 2c 20 26 6d 79 45 | 76 65 6e 74 29 20 29 20 |nt, &myE|vent) ) |
|000003e0| 7b 0d 09 09 73 77 69 74 | 63 68 28 20 6d 79 45 76 |{...swit|ch( myEv|
|000003f0| 65 6e 74 2e 77 68 61 74 | 20 29 20 7b 0d 09 09 09 |ent.what| ) {....|
|00000400| 63 61 73 65 20 6d 6f 75 | 73 65 44 6f 77 6e 3a 0d |case mou|seDown:.|
|00000410| 09 09 09 09 77 69 6e 64 | 6f 77 50 61 72 74 20 3d |....wind|owPart =|
|00000420| 20 46 69 6e 64 57 69 6e | 64 6f 77 28 6d 79 45 76 | FindWin|dow(myEv|
|00000430| 65 6e 74 2e 77 68 65 72 | 65 2c 20 26 77 68 69 63 |ent.wher|e, &whic|
|00000440| 68 57 69 6e 64 6f 77 29 | 3b 0d 09 09 09 09 44 6f |hWindow)|;.....Do|
|00000450| 4d 6f 75 73 65 44 6f 77 | 6e 28 77 69 6e 64 6f 77 |MouseDow|n(window|
|00000460| 50 61 72 74 2c 20 77 68 | 69 63 68 57 69 6e 64 6f |Part, wh|ichWindo|
|00000470| 77 2c 20 26 6d 79 45 76 | 65 6e 74 29 3b 0d 0d 09 |w, &myEv|ent);...|
|00000480| 09 09 63 61 73 65 20 6b | 65 79 44 6f 77 6e 3a 0d |..case k|eyDown:.|
|00000490| 09 09 09 63 61 73 65 20 | 61 75 74 6f 4b 65 79 3a |...case |autoKey:|
|000004a0| 20 0d 09 09 09 7b 0d 09 | 09 09 09 72 65 67 69 73 | ....{..|...regis|
|000004b0| 74 65 72 20 63 68 61 72 | 20 74 68 65 43 68 61 72 |ter char| theChar|
|000004c0| 3b 0d 09 0d 09 09 09 09 | 74 68 65 43 68 61 72 20 |;.......|theChar |
|000004d0| 3d 20 6d 79 45 76 65 6e | 74 2e 6d 65 73 73 61 67 |= myEven|t.messag|
|000004e0| 65 20 26 20 63 68 61 72 | 43 6f 64 65 4d 61 73 6b |e & char|CodeMask|
|000004f0| 3b 0d 09 09 09 09 69 66 | 20 28 28 6d 79 45 76 65 |;.....if| ((myEve|
|00000500| 6e 74 2e 6d 6f 64 69 66 | 69 65 72 73 20 26 20 63 |nt.modif|iers & c|
|00000510| 6d 64 4b 65 79 29 20 21 | 3d 20 30 29 20 0d 09 09 |mdKey) !|= 0) ...|
|00000520| 09 09 09 44 6f 43 6f 6d | 6d 61 6e 64 28 20 4d 65 |...DoCom|mand( Me|
|00000530| 6e 75 4b 65 79 28 74 68 | 65 43 68 61 72 29 20 29 |nuKey(th|eChar) )|
|00000540| 3b 0d 09 09 09 09 62 72 | 65 61 6b 3b 0d 09 09 09 |;.....br|eak;....|
|00000550| 7d 0d 0d 09 09 09 63 61 | 73 65 20 61 63 74 69 76 |}.....ca|se activ|
|00000560| 61 74 65 45 76 74 3a 0d | 09 09 09 09 62 72 65 61 |ateEvt:.|....brea|
|00000570| 6b 3b 0d 0d 09 09 09 63 | 61 73 65 20 75 70 64 61 |k;.....c|ase upda|
|00000580| 74 65 45 76 74 3a 20 0d | 09 09 09 09 55 70 64 61 |teEvt: .|....Upda|
|00000590| 74 65 57 69 6e 64 6f 77 | 28 28 57 69 6e 64 6f 77 |teWindow|((Window|
|000005a0| 50 74 72 29 6d 79 45 76 | 65 6e 74 2e 6d 65 73 73 |Ptr)myEv|ent.mess|
|000005b0| 61 67 65 29 3b 0d 09 09 | 09 09 62 72 65 61 6b 3b |age);...|..break;|
|000005c0| 0d 09 09 7d 0d 09 7d 0d | 7d 0d 0d 0d 76 6f 69 64 |...}..}.|}...void|
|000005d0| 20 44 6f 4d 6f 75 73 65 | 44 6f 77 6e 28 73 68 6f | DoMouse|Down(sho|
|000005e0| 72 74 20 77 69 6e 64 6f | 77 50 61 72 74 2c 20 57 |rt windo|wPart, W|
|000005f0| 69 6e 64 6f 77 50 74 72 | 20 77 68 69 63 68 57 69 |indowPtr| whichWi|
|00000600| 6e 64 6f 77 2c 20 45 76 | 65 6e 74 52 65 63 6f 72 |ndow, Ev|entRecor|
|00000610| 64 20 2a 6d 79 45 76 65 | 6e 74 29 0d 7b 0d 09 73 |d *myEve|nt).{..s|
|00000620| 77 69 74 63 68 28 20 77 | 69 6e 64 6f 77 50 61 72 |witch( w|indowPar|
|00000630| 74 20 29 20 7b 0d 09 09 | 63 61 73 65 20 69 6e 47 |t ) {...|case inG|
|00000640| 6f 41 77 61 79 3a 0d 09 | 09 09 69 66 28 20 54 72 |oAway:..|..if( Tr|
|00000650| 61 63 6b 47 6f 41 77 61 | 79 28 77 68 69 63 68 57 |ackGoAwa|y(whichW|
|00000660| 69 6e 64 6f 77 2c 20 6d | 79 45 76 65 6e 74 2d 3e |indow, m|yEvent->|
|00000670| 77 68 65 72 65 29 20 29 | 0d 09 09 09 09 44 6f 46 |where) )|.....DoF|
|00000680| 69 6c 65 28 66 6d 43 6c | 6f 73 65 29 3b 0d 09 09 |ile(fmCl|ose);...|
|00000690| 09 62 72 65 61 6b 3b 0d | 0d 09 09 63 61 73 65 20 |.break;.|...case |
|000006a0| 69 6e 4d 65 6e 75 42 61 | 72 3a 0d 09 09 09 44 6f |inMenuBa|r:....Do|
|000006b0| 43 6f 6d 6d 61 6e 64 28 | 20 4d 65 6e 75 53 65 6c |Command(| MenuSel|
|000006c0| 65 63 74 28 6d 79 45 76 | 65 6e 74 2d 3e 77 68 65 |ect(myEv|ent->whe|
|000006d0| 72 65 29 20 29 3b 0d 09 | 09 09 62 72 65 61 6b 3b |re) );..|..break;|
|000006e0| 0d 0d 09 09 63 61 73 65 | 20 69 6e 53 79 73 57 69 |....case| inSysWi|
|000006f0| 6e 64 6f 77 3a 0d 09 09 | 09 53 79 73 74 65 6d 43 |ndow:...|.SystemC|
|00000700| 6c 69 63 6b 28 6d 79 45 | 76 65 6e 74 2c 20 77 68 |lick(myE|vent, wh|
|00000710| 69 63 68 57 69 6e 64 6f | 77 29 3b 0d 09 09 09 62 |ichWindo|w);....b|
|00000720| 72 65 61 6b 3b 0d 0d 09 | 09 63 61 73 65 20 69 6e |reak;...|.case in|
|00000730| 44 72 61 67 3a 0d 09 09 | 7b 09 52 65 63 74 20 64 |Drag:...|{.Rect d|
|00000740| 72 61 67 52 65 63 74 20 | 3d 20 73 63 72 65 65 6e |ragRect |= screen|
|00000750| 42 69 74 73 2e 62 6f 75 | 6e 64 73 3b 0d 09 09 09 |Bits.bou|nds;....|
|00000760| 49 6e 73 65 74 52 65 63 | 74 28 26 64 72 61 67 52 |InsetRec|t(&dragR|
|00000770| 65 63 74 2c 20 32 2c 20 | 32 29 3b 0d 09 09 09 44 |ect, 2, |2);....D|
|00000780| 72 61 67 57 69 6e 64 6f | 77 28 77 68 69 63 68 57 |ragWindo|w(whichW|
|00000790| 69 6e 64 6f 77 2c 20 6d | 79 45 76 65 6e 74 2d 3e |indow, m|yEvent->|
|000007a0| 77 68 65 72 65 2c 20 26 | 64 72 61 67 52 65 63 74 |where, &|dragRect|
|000007b0| 29 3b 0d 09 09 09 62 72 | 65 61 6b 3b 0d 09 09 7d |);....br|eak;...}|
|000007c0| 0d 0d 09 09 63 61 73 65 | 20 69 6e 47 72 6f 77 3a |....case| inGrow:|
|000007d0| 0d 09 09 09 62 72 65 61 | 6b 3b 0d 0d 09 09 63 61 |....brea|k;....ca|
|000007e0| 73 65 20 69 6e 43 6f 6e | 74 65 6e 74 3a 0d 09 09 |se inCon|tent:...|
|000007f0| 09 69 66 28 20 77 68 69 | 63 68 57 69 6e 64 6f 77 |.if( whi|chWindow|
|00000800| 20 21 3d 20 46 72 6f 6e | 74 57 69 6e 64 6f 77 28 | != Fron|tWindow(|
|00000810| 29 20 29 0d 09 09 09 09 | 53 65 6c 65 63 74 57 69 |) ).....|SelectWi|
|00000820| 6e 64 6f 77 28 77 68 69 | 63 68 57 69 6e 64 6f 77 |ndow(whi|chWindow|
|00000830| 29 3b 0d 09 09 09 65 6c | 73 65 0d 09 09 09 09 44 |);....el|se.....D|
|00000840| 6f 43 6f 6e 74 65 6e 74 | 28 77 68 69 63 68 57 69 |oContent|(whichWi|
|00000850| 6e 64 6f 77 2c 20 6d 79 | 45 76 65 6e 74 29 3b 0d |ndow, my|Event);.|
|00000860| 09 09 09 62 72 65 61 6b | 3b 0d 09 7d 0d 7d 0d 0d |...break|;..}.}..|
|00000870| 0d 76 6f 69 64 20 44 6f | 43 6f 6e 74 65 6e 74 28 |.void Do|Content(|
|00000880| 57 69 6e 64 6f 77 50 74 | 72 20 77 68 69 63 68 57 |WindowPt|r whichW|
|00000890| 69 6e 64 6f 77 2c 20 45 | 76 65 6e 74 52 65 63 6f |indow, E|ventReco|
|000008a0| 72 64 20 2a 6d 79 45 76 | 65 6e 74 29 0d 7b 0d 7d |rd *myEv|ent).{.}|
|000008b0| 0d 0d 0d 76 6f 69 64 20 | 44 6f 43 6f 6d 6d 61 6e |...void |DoComman|
|000008c0| 64 28 6c 6f 6e 67 20 6d | 52 65 73 75 6c 74 29 0d |d(long m|Result).|
|000008d0| 7b 0d 09 73 68 6f 72 74 | 09 74 68 65 49 74 65 6d |{..short|.theItem|
|000008e0| 3b 0d 09 53 74 72 32 35 | 35 09 6e 61 6d 65 3b 0d |;..Str25|5.name;.|
|000008f0| 0d 09 74 68 65 49 74 65 | 6d 20 3d 20 4c 6f 57 6f |..theIte|m = LoWo|
|00000900| 72 64 28 6d 52 65 73 75 | 6c 74 29 3b 0d 09 73 77 |rd(mResu|lt);..sw|
|00000910| 69 74 63 68 28 20 48 69 | 57 6f 72 64 28 6d 52 65 |itch( Hi|Word(mRe|
|00000920| 73 75 6c 74 29 20 29 20 | 7b 0d 09 09 63 61 73 65 |sult) ) |{...case|
|00000930| 20 61 70 70 6c 65 49 44 | 3a 0d 09 09 09 69 66 28 | appleID|:....if(|
|00000940| 20 74 68 65 49 74 65 6d | 20 3e 20 32 20 29 20 7b | theItem| > 2 ) {|
|00000950| 0d 09 09 09 09 43 47 72 | 61 66 50 74 72 20 73 61 |.....CGr|afPtr sa|
|00000960| 76 65 50 6f 72 74 3b 0d | 09 09 09 09 47 65 74 49 |vePort;.|....GetI|
|00000970| 74 65 6d 28 6d 79 4d 65 | 6e 75 73 5b 61 70 70 6c |tem(myMe|nus[appl|
|00000980| 65 4d 5d 2c 20 74 68 65 | 49 74 65 6d 2c 20 26 6e |eM], the|Item, &n|
|00000990| 61 6d 65 29 3b 0d 09 09 | 09 09 47 65 74 50 6f 72 |ame);...|..GetPor|
|000009a0| 74 28 26 73 61 76 65 50 | 6f 72 74 29 3b 0d 09 09 |t(&saveP|ort);...|
|000009b0| 09 09 4f 70 65 6e 44 65 | 73 6b 41 63 63 28 6e 61 |..OpenDe|skAcc(na|
|000009c0| 6d 65 29 3b 0d 09 09 09 | 09 53 65 74 50 6f 72 74 |me);....|.SetPort|
|000009d0| 28 73 61 76 65 50 6f 72 | 74 29 3b 0d 09 09 09 7d |(savePor|t);....}|
|000009e0| 0d 09 09 09 62 72 65 61 | 6b 3b 0d 0d 09 09 63 61 |....brea|k;....ca|
|000009f0| 73 65 20 66 69 6c 65 49 | 44 3a 0d 09 09 09 44 6f |se fileI|D:....Do|
|00000a00| 46 69 6c 65 28 74 68 65 | 49 74 65 6d 29 3b 0d 09 |File(the|Item);..|
|00000a10| 09 09 62 72 65 61 6b 3b | 0d 0d 09 09 63 61 73 65 |..break;|....case|
|00000a20| 20 65 64 69 74 49 44 3a | 0d 09 09 09 69 66 28 20 | editID:|....if( |
|00000a30| 53 79 73 74 65 6d 45 64 | 69 74 28 74 68 65 49 74 |SystemEd|it(theIt|
|00000a40| 65 6d 2d 31 29 20 3d 3d | 20 30 20 29 0d 09 09 09 |em-1) ==| 0 )....|
|00000a50| 09 44 6f 45 64 69 74 28 | 74 68 65 49 74 65 6d 29 |.DoEdit(|theItem)|
|00000a60| 3b 0d 09 09 09 62 72 65 | 61 6b 3b 0d 09 7d 0d 0d |;....bre|ak;..}..|
|00000a70| 09 48 69 6c 69 74 65 4d | 65 6e 75 28 30 29 3b 0d |.HiliteM|enu(0);.|
|00000a80| 7d 0d 0d 0d 70 61 73 63 | 61 6c 20 73 68 6f 72 74 |}...pasc|al short|
|00000a90| 20 49 6e 69 74 4f 63 74 | 72 65 65 28 73 68 6f 72 | InitOct|ree(shor|
|00000aa0| 74 20 63 6f 6c 6f 72 73 | 52 65 71 75 65 73 74 65 |t colors|Requeste|
|00000ab0| 64 2c 20 6c 6f 6e 67 20 | 2a 64 61 74 61 48 61 6e |d, long |*dataHan|
|00000ac0| 64 6c 65 50 74 72 2c 20 | 73 68 6f 72 74 20 2a 62 |dlePtr, |short *b|
|00000ad0| 61 6e 6b 54 79 70 65 29 | 3b 0d 70 61 73 63 61 6c |ankType)|;.pascal|
|00000ae0| 20 73 68 6f 72 74 20 52 | 65 63 6f 72 64 4f 63 74 | short R|ecordOct|
|00000af0| 72 65 65 43 6f 6c 6f 72 | 73 28 6c 6f 6e 67 20 64 |reeColor|s(long d|
|00000b00| 61 74 61 48 61 6e 64 6c | 65 2c 20 52 47 42 43 6f |ataHandl|e, RGBCo|
|00000b10| 6c 6f 72 20 2a 63 6f 6c | 6f 72 50 74 72 2c 20 6c |lor *col|orPtr, l|
|00000b20| 6f 6e 67 20 63 6f 6c 6f | 72 43 6f 75 6e 74 2c 20 |ong colo|rCount, |
|00000b30| 6c 6f 6e 67 20 2a 75 6e | 69 71 75 65 43 6f 6c 6f |long *un|iqueColo|
|00000b40| 72 73 50 74 72 29 3b 0d | 70 61 73 63 61 6c 20 73 |rsPtr);.|pascal s|
|00000b50| 68 6f 72 74 20 4b 69 6c | 6c 4f 63 74 72 65 65 28 |hort Kil|lOctree(|
|00000b60| 6c 6f 6e 67 20 64 61 74 | 61 48 61 6e 64 6c 65 29 |long dat|aHandle)|
|00000b70| 3b 0d 0d 0d 76 6f 69 64 | 20 44 6f 46 69 6c 65 28 |;...void| DoFile(|
|00000b80| 73 68 6f 72 74 20 69 74 | 65 6d 29 0d 7b 0d 09 73 |short it|em).{..s|
|00000b90| 77 69 74 63 68 28 20 69 | 74 65 6d 20 29 20 7b 0d |witch( i|tem ) {.|
|00000ba0| 0d 09 09 63 61 73 65 20 | 66 6d 4f 70 65 6e 3a 0d |...case |fmOpen:.|
|00000bb0| 09 09 63 61 73 65 20 66 | 6d 4e 65 77 3a 0d 09 09 |..case f|mNew:...|
|00000bc0| 09 44 6f 4f 70 65 6e 28 | 29 3b 0d 09 09 09 62 72 |.DoOpen(|);....br|
|00000bd0| 65 61 6b 3b 0d 0d 09 09 | 63 61 73 65 20 66 6d 43 |eak;....|case fmC|
|00000be0| 6c 6f 73 65 3a 0d 09 09 | 7b 09 57 69 6e 64 6f 77 |lose:...|{.Window|
|00000bf0| 50 74 72 20 63 75 72 72 | 65 6e 74 57 69 6e 64 6f |Ptr curr|entWindo|
|00000c00| 77 3b 0d 09 09 09 69 66 | 28 20 63 75 72 72 65 6e |w;....if|( curren|
|00000c10| 74 57 69 6e 64 6f 77 20 | 3d 20 46 72 6f 6e 74 57 |tWindow |= FrontW|
|00000c20| 69 6e 64 6f 77 28 29 20 | 29 20 7b 0d 09 09 09 09 |indow() |) {.....|
|00000c30| 77 69 6e 64 6f 77 44 61 | 74 61 20 2a 2a 64 61 74 |windowDa|ta **dat|
|00000c40| 61 48 61 6e 64 6c 65 20 | 3d 20 28 77 69 6e 64 6f |aHandle |= (windo|
|00000c50| 77 44 61 74 61 20 2a 2a | 29 47 65 74 57 52 65 66 |wData **|)GetWRef|
|00000c60| 43 6f 6e 28 63 75 72 72 | 65 6e 74 57 69 6e 64 6f |Con(curr|entWindo|
|00000c70| 77 29 3b 0d 09 09 09 09 | 50 61 6c 65 74 74 65 48 |w);.....|PaletteH|
|00000c80| 61 6e 64 6c 65 20 74 65 | 6d 70 50 61 6c 65 74 74 |andle te|mpPalett|
|00000c90| 65 3b 0d 0d 09 09 09 09 | 2f 2a 09 6e 6f 74 65 20 |e;......|/*.note |
|00000ca0| 74 68 61 74 20 77 65 20 | 6c 6f 63 6b 20 74 68 65 |that we |lock the|
|00000cb0| 20 64 61 74 61 20 68 61 | 6e 64 6c 65 2c 20 73 69 | data ha|ndle, si|
|00000cc0| 6e 63 65 20 44 69 73 70 | 6f 73 65 44 69 73 6b 50 |nce Disp|oseDiskP|
|00000cd0| 69 63 74 75 72 65 20 6d | 69 67 68 74 20 6d 6f 76 |icture m|ight mov|
|00000ce0| 65 20 6d 65 6d 6f 72 79 | 20 2a 2f 0d 09 09 09 09 |e memory| */.....|
|00000cf0| 48 4c 6f 63 6b 28 64 61 | 74 61 48 61 6e 64 6c 65 |HLock(da|taHandle|
|00000d00| 29 3b 0d 09 09 09 09 44 | 69 73 70 6f 73 65 44 69 |);.....D|isposeDi|
|00000d10| 73 6b 50 69 63 74 75 72 | 65 28 28 2a 64 61 74 61 |skPictur|e((*data|
|00000d20| 48 61 6e 64 6c 65 29 2d | 3e 63 6f 6e 74 65 6e 74 |Handle)-|>content|
|00000d30| 50 69 63 74 75 72 65 29 | 3b 0d 09 09 09 09 48 55 |Picture)|;.....HU|
|00000d40| 6e 6c 6f 63 6b 28 64 61 | 74 61 48 61 6e 64 6c 65 |nlock(da|taHandle|
|00000d50| 29 3b 0d 09 09 09 09 44 | 69 73 70 6f 73 65 48 61 |);.....D|isposeHa|
|00000d60| 6e 64 6c 65 28 64 61 74 | 61 48 61 6e 64 6c 65 29 |ndle(dat|aHandle)|
|00000d70| 3b 0d 0d 09 09 09 09 2f | 2a 09 6e 6f 74 65 20 74 |;....../|*.note t|
|00000d80| 68 61 74 20 77 65 20 64 | 6f 6e d5 74 20 64 69 73 |hat we d|on.t dis|
|00000d90| 70 6f 73 65 20 6f 66 20 | 74 68 65 20 70 61 6c 65 |pose of |the pale|
|00000da0| 74 74 65 20 75 6e 74 69 | 6c 20 61 66 74 65 72 20 |tte unti|l after |
|00000db0| 74 68 65 20 77 69 6e 64 | 6f 77 20 69 73 20 64 69 |the wind|ow is di|
|00000dc0| 73 70 6f 73 65 64 20 6f | 66 2c 20 73 69 6e 63 65 |sposed o|f, since|
|00000dd0| 20 74 68 65 20 77 69 6e | 64 6f 77 0d 09 09 09 09 | the win|dow.....|
|00000de0| 09 6d 61 79 20 6e 65 65 | 64 20 69 74 20 64 75 72 |.may nee|d it dur|
|00000df0| 69 6e 67 20 74 68 65 20 | 64 69 73 70 6f 73 65 20 |ing the |dispose |
|00000e00| 70 72 6f 63 65 73 73 20 | 2a 2f 0d 09 09 09 09 74 |process |*/.....t|
|00000e10| 65 6d 70 50 61 6c 65 74 | 74 65 20 3d 20 47 65 74 |empPalet|te = Get|
|00000e20| 50 61 6c 65 74 74 65 28 | 63 75 72 72 65 6e 74 57 |Palette(|currentW|
|00000e30| 69 6e 64 6f 77 29 3b 0d | 09 09 09 09 44 69 73 70 |indow);.|....Disp|
|00000e40| 6f 73 65 57 69 6e 64 6f | 77 28 63 75 72 72 65 6e |oseWindo|w(curren|
|00000e50| 74 57 69 6e 64 6f 77 29 | 3b 0d 09 09 09 09 44 69 |tWindow)|;.....Di|
|00000e60| 73 70 6f 73 65 50 61 6c | 65 74 74 65 28 74 65 6d |sposePal|ette(tem|
|00000e70| 70 50 61 6c 65 74 74 65 | 29 3b 0d 09 09 09 7d 0d |pPalette|);....}.|
|00000e80| 09 09 09 62 72 65 61 6b | 3b 0d 09 09 7d 0d 0d 09 |...break|;...}...|
|00000e90| 09 63 61 73 65 20 66 6d | 51 75 69 74 3a 0d 09 09 |.case fm|Quit:...|
|00000ea0| 09 77 68 69 6c 65 28 20 | 46 72 6f 6e 74 57 69 6e |.while( |FrontWin|
|00000eb0| 64 6f 77 28 29 20 29 0d | 09 09 09 09 44 6f 46 69 |dow() ).|....DoFi|
|00000ec0| 6c 65 28 66 6d 43 6c 6f | 73 65 29 3b 0d 09 09 09 |le(fmClo|se);....|
|00000ed0| 71 75 69 74 74 69 6e 67 | 20 3d 20 74 72 75 65 3b |quitting| = true;|
|00000ee0| 0d 09 09 09 62 72 65 61 | 6b 3b 0d 09 7d 0d 7d 0d |....brea|k;..}.}.|
|00000ef0| 0d 0d 76 6f 69 64 20 44 | 6f 45 64 69 74 28 73 68 |..void D|oEdit(sh|
|00000f00| 6f 72 74 20 69 74 65 6d | 29 0d 7b 0d 7d 0d 0d 0d |ort item|).{.}...|
|00000f10| 76 6f 69 64 20 44 6f 4f | 70 65 6e 28 76 6f 69 64 |void DoO|pen(void|
|00000f20| 29 0d 7b 0d 09 52 65 63 | 74 20 77 69 6e 64 6f 77 |).{..Rec|t window|
|00000f30| 42 6f 75 6e 64 73 2c 20 | 70 69 63 74 75 72 65 42 |Bounds, |pictureB|
|00000f40| 6f 75 6e 64 73 3b 0d 09 | 53 74 61 6e 64 61 72 64 |ounds;..|Standard|
|00000f50| 46 69 6c 65 52 65 70 6c | 79 20 72 65 70 6c 79 3b |FileRepl|y reply;|
|00000f60| 0d 09 53 46 54 79 70 65 | 4c 69 73 74 20 74 79 70 |..SFType|List typ|
|00000f70| 65 4c 69 73 74 3b 0d 09 | 57 69 6e 64 6f 77 50 74 |eList;..|WindowPt|
|00000f80| 72 20 74 65 6d 70 57 69 | 6e 64 6f 77 3b 0d 09 77 |r tempWi|ndow;..w|
|00000f90| 69 6e 64 6f 77 44 61 74 | 61 20 2a 2a 64 61 74 61 |indowDat|a **data|
|00000fa0| 48 61 6e 64 6c 65 3b 0d | 09 64 69 73 6b 50 69 63 |Handle;.|.diskPic|
|00000fb0| 74 75 72 65 20 63 6f 6e | 74 65 6e 74 50 69 63 74 |ture con|tentPict|
|00000fc0| 75 72 65 3b 0d 09 4f 53 | 45 72 72 20 65 72 72 6f |ure;..OS|Err erro|
|00000fd0| 72 3b 0d 09 50 69 63 74 | 49 6e 66 6f 20 72 65 73 |r;..Pict|Info res|
|00000fe0| 75 6c 74 49 6e 66 6f 3b | 0d 09 63 68 61 72 20 77 |ultInfo;|..char w|
|00000ff0| 69 6e 64 6f 77 4e 61 6d | 65 5b 32 35 36 5d 3b 0d |indowNam|e[256];.|
|00001000| 09 50 61 6c 65 74 74 65 | 48 61 6e 64 6c 65 20 6f |.Palette|Handle o|
|00001010| 72 69 67 69 6e 61 6c 50 | 61 6c 65 74 74 65 3b 0d |riginalP|alette;.|
|00001020| 0d 09 74 79 70 65 4c 69 | 73 74 5b 30 5d 20 3d 20 |..typeLi|st[0] = |
|00001030| 27 50 49 43 54 27 3b 0d | 09 53 74 61 6e 64 61 72 |'PICT';.|.Standar|
|00001040| 64 47 65 74 46 69 6c 65 | 28 6e 69 6c 2c 20 31 2c |dGetFile|(nil, 1,|
|00001050| 20 74 79 70 65 4c 69 73 | 74 2c 20 26 72 65 70 6c | typeLis|t, &repl|
|00001060| 79 29 3b 0d 09 69 66 28 | 20 72 65 70 6c 79 2e 73 |y);..if(| reply.s|
|00001070| 66 47 6f 6f 64 20 3d 3d | 20 66 61 6c 73 65 20 29 |fGood ==| false )|
|00001080| 0d 09 09 72 65 74 75 72 | 6e 3b 0d 0d 2f 2f 09 4d |...retur|n;..//.M|
|00001090| 61 6b 65 49 54 61 62 6c | 65 28 63 6f 6c 6f 72 54 |akeITabl|e(colorT|
|000010a0| 61 62 2c 20 69 6e 76 65 | 72 73 65 54 61 62 2c 20 |ab, inve|rseTab, |
|000010b0| 35 29 3b 0d 0d 09 63 6f | 6e 74 65 6e 74 50 69 63 |5);...co|ntentPic|
|000010c0| 74 75 72 65 20 3d 20 4e | 65 77 44 69 73 6b 50 69 |ture = N|ewDiskPi|
|000010d0| 63 74 75 72 65 28 26 72 | 65 70 6c 79 2e 73 66 46 |cture(&r|eply.sfF|
|000010e0| 69 6c 65 29 3b 0d 09 47 | 65 74 44 69 73 6b 50 69 |ile);..G|etDiskPi|
|000010f0| 63 74 75 72 65 42 6f 75 | 6e 64 73 28 63 6f 6e 74 |ctureBou|nds(cont|
|00001100| 65 6e 74 50 69 63 74 75 | 72 65 2c 20 26 70 69 63 |entPictu|re, &pic|
|00001110| 74 75 72 65 42 6f 75 6e | 64 73 29 3b 0d 09 46 69 |tureBoun|ds);..Fi|
|00001120| 6e 64 53 63 72 65 65 6e | 28 73 63 72 65 65 6e 38 |ndScreen|(screen8|
|00001130| 42 69 74 20 2b 20 73 63 | 72 65 65 6e 43 6f 6c 6f |Bit + sc|reenColo|
|00001140| 72 2c 20 70 69 63 74 75 | 72 65 42 6f 75 6e 64 73 |r, pictu|reBounds|
|00001150| 2e 72 69 67 68 74 20 2d | 20 70 69 63 74 75 72 65 |.right -| picture|
|00001160| 42 6f 75 6e 64 73 2e 6c | 65 66 74 2c 0d 09 09 70 |Bounds.l|eft,...p|
|00001170| 69 63 74 75 72 65 42 6f | 75 6e 64 73 2e 62 6f 74 |ictureBo|unds.bot|
|00001180| 74 6f 6d 20 2d 20 70 69 | 63 74 75 72 65 42 6f 75 |tom - pi|ctureBou|
|00001190| 6e 64 73 2e 74 6f 70 2c | 20 26 77 69 6e 64 6f 77 |nds.top,| &window|
|000011a0| 42 6f 75 6e 64 73 29 3b | 0d 0d 2f 2a 20 74 68 69 |Bounds);|../* thi|
|000011b0| 73 20 69 73 20 66 6f 72 | 20 74 68 65 20 75 6e 6d |s is for| the unm|
|000011c0| 61 74 63 68 65 64 20 6f | 6e 65 20 2a 2f 0d 09 64 |atched o|ne */..d|
|000011d0| 61 74 61 48 61 6e 64 6c | 65 20 3d 20 28 77 69 6e |ataHandl|e = (win|
|000011e0| 64 6f 77 44 61 74 61 20 | 2a 2a 29 4e 65 77 48 61 |dowData |**)NewHa|
|000011f0| 6e 64 6c 65 28 73 69 7a | 65 6f 66 28 77 69 6e 64 |ndle(siz|eof(wind|
|00001200| 6f 77 44 61 74 61 29 29 | 3b 0d 09 48 4c 6f 63 6b |owData))|;..HLock|
|00001210| 28 64 61 74 61 48 61 6e | 64 6c 65 29 3b 0d 09 28 |(dataHan|dle);..(|
|00001220| 2a 64 61 74 61 48 61 6e | 64 6c 65 29 2d 3e 63 6f |*dataHan|dle)->co|
|00001230| 6e 74 65 6e 74 50 69 63 | 74 75 72 65 20 3d 20 63 |ntentPic|ture = c|
|00001240| 6f 6e 74 65 6e 74 50 69 | 63 74 75 72 65 3b 0d 0d |ontentPi|cture;..|
|00001250| 09 73 70 72 69 6e 74 66 | 28 26 77 69 6e 64 6f 77 |.sprintf|(&window|
|00001260| 4e 61 6d 65 5b 31 5d 2c | 20 22 25 23 73 20 3a 20 |Name[1],| "%#s : |
|00001270| 6f 72 69 67 69 6e 61 6c | 22 2c 20 26 72 65 70 6c |original|", &repl|
|00001280| 79 2e 73 66 46 69 6c 65 | 2e 6e 61 6d 65 29 3b 0d |y.sfFile|.name);.|
|00001290| 09 77 69 6e 64 6f 77 4e | 61 6d 65 5b 30 5d 20 3d |.windowN|ame[0] =|
|000012a0| 20 73 74 72 6c 65 6e 28 | 26 77 69 6e 64 6f 77 4e | strlen(|&windowN|
|000012b0| 61 6d 65 5b 31 5d 29 3b | 0d 09 74 65 6d 70 57 69 |ame[1]);|..tempWi|
|000012c0| 6e 64 6f 77 20 3d 20 4e | 65 77 43 57 69 6e 64 6f |ndow = N|ewCWindo|
|000012d0| 77 28 6e 69 6c 2c 20 26 | 77 69 6e 64 6f 77 42 6f |w(nil, &|windowBo|
|000012e0| 75 6e 64 73 2c 20 26 77 | 69 6e 64 6f 77 4e 61 6d |unds, &w|indowNam|
|000012f0| 65 5b 30 5d 2c 20 74 72 | 75 65 2c 20 6e 6f 47 72 |e[0], tr|ue, noGr|
|00001300| 6f 77 44 6f 63 50 72 6f | 63 2c 20 28 76 6f 69 64 |owDocPro|c, (void|
|00001310| 20 2a 29 28 2d 31 29 2c | 20 74 72 75 65 2c 20 30 | *)(-1),| true, 0|
|00001320| 29 3b 0d 0d 09 53 65 74 | 50 6f 72 74 28 74 65 6d |);...Set|Port(tem|
|00001330| 70 57 69 6e 64 6f 77 29 | 3b 0d 09 53 65 74 57 52 |pWindow)|;..SetWR|
|00001340| 65 66 43 6f 6e 28 74 65 | 6d 70 57 69 6e 64 6f 77 |efCon(te|mpWindow|
|00001350| 2c 20 28 6c 6f 6e 67 29 | 64 61 74 61 48 61 6e 64 |, (long)|dataHand|
|00001360| 6c 65 29 3b 0d 09 48 55 | 6e 6c 6f 63 6b 28 64 61 |le);..HU|nlock(da|
|00001370| 74 61 48 61 6e 64 6c 65 | 29 3b 0d 0d 09 7b 09 43 |taHandle|);...{.C|
|00001380| 54 61 62 48 61 6e 64 6c | 65 20 63 6f 6c 6f 72 54 |TabHandl|e colorT|
|00001390| 61 62 6c 65 3b 0d 09 09 | 63 6f 6c 6f 72 54 61 62 |able;...|colorTab|
|000013a0| 6c 65 20 3d 20 47 65 74 | 43 54 61 62 6c 65 28 73 |le = Get|CTable(s|
|000013b0| 74 61 6e 64 61 72 64 43 | 6c 75 74 49 44 29 3b 0d |tandardC|lutID);.|
|000013c0| 09 09 6f 72 69 67 69 6e | 61 6c 50 61 6c 65 74 74 |..origin|alPalett|
|000013d0| 65 20 3d 20 4e 65 77 50 | 61 6c 65 74 74 65 28 63 |e = NewP|alette(c|
|000013e0| 6f 6c 6f 72 73 54 6f 52 | 65 71 75 65 73 74 2c 20 |olorsToR|equest, |
|000013f0| 63 6f 6c 6f 72 54 61 62 | 6c 65 2c 20 70 6d 54 6f |colorTab|le, pmTo|
|00001400| 6c 65 72 61 6e 74 2c 20 | 30 29 3b 0d 09 09 4e 53 |lerant, |0);...NS|
|00001410| 65 74 50 61 6c 65 74 74 | 65 28 74 65 6d 70 57 69 |etPalett|e(tempWi|
|00001420| 6e 64 6f 77 2c 20 6f 72 | 69 67 69 6e 61 6c 50 61 |ndow, or|iginalPa|
|00001430| 6c 65 74 74 65 2c 20 70 | 6d 46 67 55 70 64 61 74 |lette, p|mFgUpdat|
|00001440| 65 73 29 3b 0d 09 09 41 | 63 74 69 76 61 74 65 50 |es);...A|ctivateP|
|00001450| 61 6c 65 74 74 65 28 74 | 65 6d 70 57 69 6e 64 6f |alette(t|empWindo|
|00001460| 77 29 3b 0d 09 7d 0d 0d | 2f 2a 20 74 68 69 73 20 |w);..}..|/* this |
|00001470| 69 73 20 75 73 69 6e 67 | 20 74 68 65 20 6d 65 64 |is using| the med|
|00001480| 69 61 6e 20 6d 65 74 68 | 6f 64 20 2a 2f 0d 09 64 |ian meth|od */..d|
|00001490| 61 74 61 48 61 6e 64 6c | 65 20 3d 20 28 77 69 6e |ataHandl|e = (win|
|000014a0| 64 6f 77 44 61 74 61 20 | 2a 2a 29 4e 65 77 48 61 |dowData |**)NewHa|
|000014b0| 6e 64 6c 65 28 73 69 7a | 65 6f 66 28 77 69 6e 64 |ndle(siz|eof(wind|
|000014c0| 6f 77 44 61 74 61 29 29 | 3b 0d 09 48 4c 6f 63 6b |owData))|;..HLock|
|000014d0| 28 64 61 74 61 48 61 6e | 64 6c 65 29 3b 0d 09 28 |(dataHan|dle);..(|
|000014e0| 2a 64 61 74 61 48 61 6e | 64 6c 65 29 2d 3e 63 6f |*dataHan|dle)->co|
|000014f0| 6e 74 65 6e 74 50 69 63 | 74 75 72 65 20 3d 20 43 |ntentPic|ture = C|
|00001500| 6c 6f 6e 65 44 69 73 6b | 50 69 63 74 75 72 65 28 |loneDisk|Picture(|
|00001510| 63 6f 6e 74 65 6e 74 50 | 69 63 74 75 72 65 29 3b |contentP|icture);|
|00001520| 0d 0d 09 73 70 72 69 6e | 74 66 28 26 77 69 6e 64 |...sprin|tf(&wind|
|00001530| 6f 77 4e 61 6d 65 5b 31 | 5d 2c 20 22 25 23 73 20 |owName[1|], "%#s |
|00001540| 3a 20 6d 65 64 69 61 6e | 22 2c 20 26 72 65 70 6c |: median|", &repl|
|00001550| 79 2e 73 66 46 69 6c 65 | 2e 6e 61 6d 65 29 3b 0d |y.sfFile|.name);.|
|00001560| 09 77 69 6e 64 6f 77 4e | 61 6d 65 5b 30 5d 20 3d |.windowN|ame[0] =|
|00001570| 20 73 74 72 6c 65 6e 28 | 26 77 69 6e 64 6f 77 4e | strlen(|&windowN|
|00001580| 61 6d 65 5b 31 5d 29 3b | 0d 09 74 65 6d 70 57 69 |ame[1]);|..tempWi|
|00001590| 6e 64 6f 77 20 3d 20 4e | 65 77 43 57 69 6e 64 6f |ndow = N|ewCWindo|
|000015a0| 77 28 6e 69 6c 2c 20 26 | 77 69 6e 64 6f 77 42 6f |w(nil, &|windowBo|
|000015b0| 75 6e 64 73 2c 20 26 77 | 69 6e 64 6f 77 4e 61 6d |unds, &w|indowNam|
|000015c0| 65 5b 30 5d 2c 20 74 72 | 75 65 2c 20 6e 6f 47 72 |e[0], tr|ue, noGr|
|000015d0| 6f 77 44 6f 63 50 72 6f | 63 2c 20 28 76 6f 69 64 |owDocPro|c, (void|
|000015e0| 20 2a 29 28 2d 31 29 2c | 20 74 72 75 65 2c 20 30 | *)(-1),| true, 0|
|000015f0| 29 3b 0d 0d 09 53 65 74 | 50 6f 72 74 28 74 65 6d |);...Set|Port(tem|
|00001600| 70 57 69 6e 64 6f 77 29 | 3b 0d 09 53 65 74 57 52 |pWindow)|;..SetWR|
|00001610| 65 66 43 6f 6e 28 74 65 | 6d 70 57 69 6e 64 6f 77 |efCon(te|mpWindow|
|00001620| 2c 20 28 6c 6f 6e 67 29 | 64 61 74 61 48 61 6e 64 |, (long)|dataHand|
|00001630| 6c 65 29 3b 0d 09 48 55 | 6e 6c 6f 63 6b 28 64 61 |le);..HU|nlock(da|
|00001640| 74 61 48 61 6e 64 6c 65 | 29 3b 0d 0d 09 7b 20 6c |taHandle|);...{ l|
|00001650| 6f 6e 67 20 6f 72 69 67 | 69 6e 61 6c 3b 0d 09 6f |ong orig|inal;..o|
|00001660| 72 69 67 69 6e 61 6c 20 | 3d 20 54 69 63 6b 43 6f |riginal |= TickCo|
|00001670| 75 6e 74 28 29 3b 0d 09 | 47 65 74 44 69 73 6b 50 |unt();..|GetDiskP|
|00001680| 69 63 74 75 72 65 49 6e | 66 6f 28 63 6f 6e 74 65 |ictureIn|fo(conte|
|00001690| 6e 74 50 69 63 74 75 72 | 65 2c 20 26 72 65 73 75 |ntPictur|e, &resu|
|000016a0| 6c 74 49 6e 66 6f 2c 20 | 72 65 74 75 72 6e 50 61 |ltInfo, |returnPa|
|000016b0| 6c 65 74 74 65 2c 20 63 | 6f 6c 6f 72 73 54 6f 52 |lette, c|olorsToR|
|000016c0| 65 71 75 65 73 74 2c 20 | 6d 65 64 69 61 6e 4d 65 |equest, |medianMe|
|000016d0| 74 68 6f 64 29 3b 0d 09 | 6f 72 69 67 69 6e 61 6c |thod);..|original|
|000016e0| 20 3d 20 54 69 63 6b 43 | 6f 75 6e 74 28 29 20 2d | = TickC|ount() -|
|000016f0| 20 6f 72 69 67 69 6e 61 | 6c 3b 0d 09 7d 0d 09 4e | origina|l;..}..N|
|00001700| 53 65 74 50 61 6c 65 74 | 74 65 28 74 65 6d 70 57 |SetPalet|te(tempW|
|00001710| 69 6e 64 6f 77 2c 20 72 | 65 73 75 6c 74 49 6e 66 |indow, r|esultInf|
|00001720| 6f 2e 74 68 65 50 61 6c | 65 74 74 65 2c 20 70 6d |o.thePal|ette, pm|
|00001730| 46 67 55 70 64 61 74 65 | 73 29 3b 0d 09 41 63 74 |FgUpdate|s);..Act|
|00001740| 69 76 61 74 65 50 61 6c | 65 74 74 65 28 74 65 6d |ivatePal|ette(tem|
|00001750| 70 57 69 6e 64 6f 77 29 | 3b 0d 0d 0d 2f 2a 20 74 |pWindow)|;.../* t|
|00001760| 68 69 73 20 69 73 20 75 | 73 69 6e 67 20 74 68 65 |his is u|sing the|
|00001770| 20 70 6f 70 75 6c 61 72 | 20 6d 65 74 68 6f 64 20 | popular| method |
|00001780| 2a 2f 0d 0d 09 64 61 74 | 61 48 61 6e 64 6c 65 20 |*/...dat|aHandle |
|00001790| 3d 20 28 77 69 6e 64 6f | 77 44 61 74 61 20 2a 2a |= (windo|wData **|
|000017a0| 29 4e 65 77 48 61 6e 64 | 6c 65 28 73 69 7a 65 6f |)NewHand|le(sizeo|
|000017b0| 66 28 77 69 6e 64 6f 77 | 44 61 74 61 29 29 3b 0d |f(window|Data));.|
|000017c0| 09 48 4c 6f 63 6b 28 64 | 61 74 61 48 61 6e 64 6c |.HLock(d|ataHandl|
|000017d0| 65 29 3b 0d 09 28 2a 64 | 61 74 61 48 61 6e 64 6c |e);..(*d|ataHandl|
|000017e0| 65 29 2d 3e 63 6f 6e 74 | 65 6e 74 50 69 63 74 75 |e)->cont|entPictu|
|000017f0| 72 65 20 3d 20 43 6c 6f | 6e 65 44 69 73 6b 50 69 |re = Clo|neDiskPi|
|00001800| 63 74 75 72 65 28 63 6f | 6e 74 65 6e 74 50 69 63 |cture(co|ntentPic|
|00001810| 74 75 72 65 29 3b 0d 0d | 09 73 70 72 69 6e 74 66 |ture);..|.sprintf|
|00001820| 28 26 77 69 6e 64 6f 77 | 4e 61 6d 65 5b 31 5d 2c |(&window|Name[1],|
|00001830| 20 22 25 23 73 20 3a 20 | 70 6f 70 75 6c 61 72 22 | "%#s : |popular"|
|00001840| 2c 20 26 72 65 70 6c 79 | 2e 73 66 46 69 6c 65 2e |, &reply|.sfFile.|
|00001850| 6e 61 6d 65 29 3b 0d 09 | 77 69 6e 64 6f 77 4e 61 |name);..|windowNa|
|00001860| 6d 65 5b 30 5d 20 3d 20 | 73 74 72 6c 65 6e 28 26 |me[0] = |strlen(&|
|00001870| 77 69 6e 64 6f 77 4e 61 | 6d 65 5b 31 5d 29 3b 0d |windowNa|me[1]);.|
|00001880| 09 74 65 6d 70 57 69 6e | 64 6f 77 20 3d 20 4e 65 |.tempWin|dow = Ne|
|00001890| 77 43 57 69 6e 64 6f 77 | 28 6e 69 6c 2c 20 26 77 |wCWindow|(nil, &w|
|000018a0| 69 6e 64 6f 77 42 6f 75 | 6e 64 73 2c 20 26 77 69 |indowBou|nds, &wi|
|000018b0| 6e 64 6f 77 4e 61 6d 65 | 5b 30 5d 2c 20 74 72 75 |ndowName|[0], tru|
|000018c0| 65 2c 20 6e 6f 47 72 6f | 77 44 6f 63 50 72 6f 63 |e, noGro|wDocProc|
|000018d0| 2c 20 28 76 6f 69 64 20 | 2a 29 28 2d 31 29 2c 20 |, (void |*)(-1), |
|000018e0| 74 72 75 65 2c 20 30 29 | 3b 0d 0d 09 53 65 74 50 |true, 0)|;...SetP|
|000018f0| 6f 72 74 28 74 65 6d 70 | 57 69 6e 64 6f 77 29 3b |ort(temp|Window);|
|00001900| 0d 09 53 65 74 57 52 65 | 66 43 6f 6e 28 74 65 6d |..SetWRe|fCon(tem|
|00001910| 70 57 69 6e 64 6f 77 2c | 20 28 6c 6f 6e 67 29 64 |pWindow,| (long)d|
|00001920| 61 74 61 48 61 6e 64 6c | 65 29 3b 0d 09 48 55 6e |ataHandl|e);..HUn|
|00001930| 6c 6f 63 6b 28 64 61 74 | 61 48 61 6e 64 6c 65 29 |lock(dat|aHandle)|
|00001940| 3b 0d 0d 09 7b 20 6c 6f | 6e 67 20 6f 72 69 67 69 |;...{ lo|ng origi|
|00001950| 6e 61 6c 3b 0d 09 6f 72 | 69 67 69 6e 61 6c 20 3d |nal;..or|iginal =|
|00001960| 20 54 69 63 6b 43 6f 75 | 6e 74 28 29 3b 0d 09 47 | TickCou|nt();..G|
|00001970| 65 74 44 69 73 6b 50 69 | 63 74 75 72 65 49 6e 66 |etDiskPi|ctureInf|
|00001980| 6f 28 63 6f 6e 74 65 6e | 74 50 69 63 74 75 72 65 |o(conten|tPicture|
|00001990| 2c 20 26 72 65 73 75 6c | 74 49 6e 66 6f 2c 20 72 |, &resul|tInfo, r|
|000019a0| 65 74 75 72 6e 50 61 6c | 65 74 74 65 2c 20 63 6f |eturnPal|ette, co|
|000019b0| 6c 6f 72 73 54 6f 52 65 | 71 75 65 73 74 2c 20 70 |lorsToRe|quest, p|
|000019c0| 6f 70 75 6c 61 72 4d 65 | 74 68 6f 64 29 3b 0d 09 |opularMe|thod);..|
|000019d0| 6f 72 69 67 69 6e 61 6c | 20 3d 20 54 69 63 6b 43 |original| = TickC|
|000019e0| 6f 75 6e 74 28 29 20 2d | 20 6f 72 69 67 69 6e 61 |ount() -| origina|
|000019f0| 6c 3b 0d 09 7d 0d 09 4e | 53 65 74 50 61 6c 65 74 |l;..}..N|SetPalet|
|00001a00| 74 65 28 74 65 6d 70 57 | 69 6e 64 6f 77 2c 20 72 |te(tempW|indow, r|
|00001a10| 65 73 75 6c 74 49 6e 66 | 6f 2e 74 68 65 50 61 6c |esultInf|o.thePal|
|00001a20| 65 74 74 65 2c 20 70 6d | 46 67 55 70 64 61 74 65 |ette, pm|FgUpdate|
|00001a30| 73 29 3b 0d 09 41 63 74 | 69 76 61 74 65 50 61 6c |s);..Act|ivatePal|
|00001a40| 65 74 74 65 28 74 65 6d | 70 57 69 6e 64 6f 77 29 |ette(tem|pWindow)|
|00001a50| 3b 0d 0d 2f 2a 20 74 68 | 69 73 20 69 73 20 75 73 |;../* th|is is us|
|00001a60| 69 6e 67 20 74 68 65 20 | 6f 63 74 72 65 65 20 6d |ing the |octree m|
|00001a70| 65 74 68 6f 64 20 2a 2f | 0d 09 64 61 74 61 48 61 |ethod */|..dataHa|
|00001a80| 6e 64 6c 65 20 3d 20 28 | 77 69 6e 64 6f 77 44 61 |ndle = (|windowDa|
|00001a90| 74 61 20 2a 2a 29 4e 65 | 77 48 61 6e 64 6c 65 28 |ta **)Ne|wHandle(|
|00001aa0| 73 69 7a 65 6f 66 28 77 | 69 6e 64 6f 77 44 61 74 |sizeof(w|indowDat|
|00001ab0| 61 29 29 3b 0d 09 48 4c | 6f 63 6b 28 64 61 74 61 |a));..HL|ock(data|
|00001ac0| 48 61 6e 64 6c 65 29 3b | 0d 09 28 2a 64 61 74 61 |Handle);|..(*data|
|00001ad0| 48 61 6e 64 6c 65 29 2d | 3e 63 6f 6e 74 65 6e 74 |Handle)-|>content|
|00001ae0| 50 69 63 74 75 72 65 20 | 3d 20 43 6c 6f 6e 65 44 |Picture |= CloneD|
|00001af0| 69 73 6b 50 69 63 74 75 | 72 65 28 63 6f 6e 74 65 |iskPictu|re(conte|
|00001b00| 6e 74 50 69 63 74 75 72 | 65 29 3b 0d 0d 09 73 70 |ntPictur|e);...sp|
|00001b10| 72 69 6e 74 66 28 26 77 | 69 6e 64 6f 77 4e 61 6d |rintf(&w|indowNam|
|00001b20| 65 5b 31 5d 2c 20 22 25 | 23 73 20 3a 20 6f 63 74 |e[1], "%|#s : oct|
|00001b30| 72 65 65 22 2c 20 26 72 | 65 70 6c 79 2e 73 66 46 |ree", &r|eply.sfF|
|00001b40| 69 6c 65 2e 6e 61 6d 65 | 29 3b 0d 09 77 69 6e 64 |ile.name|);..wind|
|00001b50| 6f 77 4e 61 6d 65 5b 30 | 5d 20 3d 20 73 74 72 6c |owName[0|] = strl|
|00001b60| 65 6e 28 26 77 69 6e 64 | 6f 77 4e 61 6d 65 5b 31 |en(&wind|owName[1|
|00001b70| 5d 29 3b 0d 09 74 65 6d | 70 57 69 6e 64 6f 77 20 |]);..tem|pWindow |
|00001b80| 3d 20 4e 65 77 43 57 69 | 6e 64 6f 77 28 6e 69 6c |= NewCWi|ndow(nil|
|00001b90| 2c 20 26 77 69 6e 64 6f | 77 42 6f 75 6e 64 73 2c |, &windo|wBounds,|
|00001ba0| 20 26 77 69 6e 64 6f 77 | 4e 61 6d 65 5b 30 5d 2c | &window|Name[0],|
|00001bb0| 20 74 72 75 65 2c 20 6e | 6f 47 72 6f 77 44 6f 63 | true, n|oGrowDoc|
|00001bc0| 50 72 6f 63 2c 20 28 76 | 6f 69 64 20 2a 29 28 2d |Proc, (v|oid *)(-|
|00001bd0| 31 29 2c 20 74 72 75 65 | 2c 20 30 29 3b 0d 0d 09 |1), true|, 0);...|
|00001be0| 53 65 74 50 6f 72 74 28 | 74 65 6d 70 57 69 6e 64 |SetPort(|tempWind|
|00001bf0| 6f 77 29 3b 0d 09 53 65 | 74 57 52 65 66 43 6f 6e |ow);..Se|tWRefCon|
|00001c00| 28 74 65 6d 70 57 69 6e | 64 6f 77 2c 20 28 6c 6f |(tempWin|dow, (lo|
|00001c10| 6e 67 29 64 61 74 61 48 | 61 6e 64 6c 65 29 3b 0d |ng)dataH|andle);.|
|00001c20| 09 48 55 6e 6c 6f 63 6b | 28 64 61 74 61 48 61 6e |.HUnlock|(dataHan|
|00001c30| 64 6c 65 29 3b 0d 0d 09 | 7b 20 6c 6f 6e 67 20 6f |dle);...|{ long o|
|00001c40| 72 69 67 69 6e 61 6c 3b | 0d 09 6f 72 69 67 69 6e |riginal;|..origin|
|00001c50| 61 6c 20 3d 20 54 69 63 | 6b 43 6f 75 6e 74 28 29 |al = Tic|kCount()|
|00001c60| 3b 0d 09 47 65 74 44 69 | 73 6b 50 69 63 74 75 72 |;..GetDi|skPictur|
|00001c70| 65 49 6e 66 6f 28 63 6f | 6e 74 65 6e 74 50 69 63 |eInfo(co|ntentPic|
|00001c80| 74 75 72 65 2c 20 26 72 | 65 73 75 6c 74 49 6e 66 |ture, &r|esultInf|
|00001c90| 6f 2c 20 72 65 74 75 72 | 6e 50 61 6c 65 74 74 65 |o, retur|nPalette|
|00001ca0| 2c 20 63 6f 6c 6f 72 73 | 54 6f 52 65 71 75 65 73 |, colors|ToReques|
|00001cb0| 74 2c 20 6f 63 74 72 65 | 65 4d 65 74 68 6f 64 29 |t, octre|eMethod)|
|00001cc0| 3b 0d 09 6f 72 69 67 69 | 6e 61 6c 20 3d 20 54 69 |;..origi|nal = Ti|
|00001cd0| 63 6b 43 6f 75 6e 74 28 | 29 20 2d 20 6f 72 69 67 |ckCount(|) - orig|
|00001ce0| 69 6e 61 6c 3b 0d 09 7d | 0d 09 4e 53 65 74 50 61 |inal;..}|..NSetPa|
|00001cf0| 6c 65 74 74 65 28 74 65 | 6d 70 57 69 6e 64 6f 77 |lette(te|mpWindow|
|00001d00| 2c 20 72 65 73 75 6c 74 | 49 6e 66 6f 2e 74 68 65 |, result|Info.the|
|00001d10| 50 61 6c 65 74 74 65 2c | 20 70 6d 46 67 55 70 64 |Palette,| pmFgUpd|
|00001d20| 61 74 65 73 29 3b 0d 09 | 41 63 74 69 76 61 74 65 |ates);..|Activate|
|00001d30| 50 61 6c 65 74 74 65 28 | 74 65 6d 70 57 69 6e 64 |Palette(|tempWind|
|00001d40| 6f 77 29 3b 0d 7d 0d 0d | 0d 76 6f 69 64 20 53 65 |ow);.}..|.void Se|
|00001d50| 74 55 70 4d 65 6e 75 73 | 28 76 6f 69 64 29 0d 7b |tUpMenus|(void).{|
|00001d60| 0d 09 73 68 6f 72 74 20 | 69 6e 64 65 78 3b 0d 0d |..short |index;..|
|00001d70| 09 6d 79 4d 65 6e 75 73 | 5b 61 70 70 6c 65 4d 5d |.myMenus|[appleM]|
|00001d80| 20 3d 20 47 65 74 4d 65 | 6e 75 28 61 70 70 6c 65 | = GetMe|nu(apple|
|00001d90| 49 44 29 3b 0d 09 41 64 | 64 52 65 73 4d 65 6e 75 |ID);..Ad|dResMenu|
|00001da0| 28 6d 79 4d 65 6e 75 73 | 5b 61 70 70 6c 65 4d 5d |(myMenus|[appleM]|
|00001db0| 2c 20 27 44 52 56 52 27 | 29 3b 0d 09 6d 79 4d 65 |, 'DRVR'|);..myMe|
|00001dc0| 6e 75 73 5b 66 69 6c 65 | 4d 5d 20 3d 20 47 65 74 |nus[file|M] = Get|
|00001dd0| 4d 65 6e 75 28 66 69 6c | 65 49 44 29 3b 0d 09 6d |Menu(fil|eID);..m|
|00001de0| 79 4d 65 6e 75 73 5b 65 | 64 69 74 4d 5d 20 3d 20 |yMenus[e|ditM] = |
|00001df0| 47 65 74 4d 65 6e 75 28 | 65 64 69 74 49 44 29 3b |GetMenu(|editID);|
|00001e00| 0d 0d 09 66 6f 72 28 69 | 6e 64 65 78 3d 61 70 70 |...for(i|ndex=app|
|00001e10| 6c 65 4d 3b 20 69 6e 64 | 65 78 20 3c 3d 20 65 64 |leM; ind|ex <= ed|
|00001e20| 69 74 4d 3b 20 69 6e 64 | 65 78 2b 2b 29 0d 09 09 |itM; ind|ex++)...|
|00001e30| 49 6e 73 65 72 74 4d 65 | 6e 75 28 6d 79 4d 65 6e |InsertMe|nu(myMen|
|00001e40| 75 73 5b 69 6e 64 65 78 | 5d 2c 20 30 29 20 3b 0d |us[index|], 0) ;.|
|00001e50| 0d 09 44 72 61 77 4d 65 | 6e 75 42 61 72 28 29 3b |..DrawMe|nuBar();|
|00001e60| 0d 7d 0d 0d 0d 76 6f 69 | 64 20 53 65 74 55 70 57 |.}...voi|d SetUpW|
|00001e70| 69 6e 64 6f 77 73 28 76 | 6f 69 64 29 0d 7b 0d 7d |indows(v|oid).{.}|
|00001e80| 0d 0d 0d 76 6f 69 64 20 | 4d 61 69 6e 74 61 69 6e |...void |Maintain|
|00001e90| 4d 65 6e 75 73 28 76 6f | 69 64 29 0d 7b 0d 7d 0d |Menus(vo|id).{.}.|
|00001ea0| 0d 0d 76 6f 69 64 20 55 | 70 64 61 74 65 57 69 6e |..void U|pdateWin|
|00001eb0| 64 6f 77 28 57 69 6e 64 | 6f 77 50 74 72 20 74 68 |dow(Wind|owPtr th|
|00001ec0| 65 57 69 6e 64 6f 77 29 | 0d 7b 0d 09 47 72 61 66 |eWindow)|.{..Graf|
|00001ed0| 50 74 72 20 73 61 76 65 | 50 6f 72 74 3b 0d 09 77 |Ptr save|Port;..w|
|00001ee0| 69 6e 64 6f 77 44 61 74 | 61 20 2a 2a 64 61 74 61 |indowDat|a **data|
|00001ef0| 48 61 6e 64 6c 65 20 3d | 20 28 77 69 6e 64 6f 77 |Handle =| (window|
|00001f00| 44 61 74 61 20 2a 2a 29 | 47 65 74 57 52 65 66 43 |Data **)|GetWRefC|
|00001f10| 6f 6e 28 74 68 65 57 69 | 6e 64 6f 77 29 3b 0d 0d |on(theWi|ndow);..|
|00001f20| 09 47 65 74 50 6f 72 74 | 28 26 73 61 76 65 50 6f |.GetPort|(&savePo|
|00001f30| 72 74 29 3b 0d 09 53 65 | 74 50 6f 72 74 28 74 68 |rt);..Se|tPort(th|
|00001f40| 65 57 69 6e 64 6f 77 29 | 3b 0d 0d 09 42 65 67 69 |eWindow)|;...Begi|
|00001f50| 6e 55 70 64 61 74 65 28 | 74 68 65 57 69 6e 64 6f |nUpdate(|theWindo|
|00001f60| 77 29 3b 0d 09 45 72 61 | 73 65 52 65 63 74 28 26 |w);..Era|seRect(&|
|00001f70| 74 68 65 57 69 6e 64 6f | 77 2d 3e 70 6f 72 74 52 |theWindo|w->portR|
|00001f80| 65 63 74 29 3b 0d 09 44 | 72 61 77 43 6f 6e 74 72 |ect);..D|rawContr|
|00001f90| 6f 6c 73 28 74 68 65 57 | 69 6e 64 6f 77 29 3b 0d |ols(theW|indow);.|
|00001fa0| 0d 09 44 72 61 77 44 69 | 73 6b 50 69 63 74 75 72 |..DrawDi|skPictur|
|00001fb0| 65 28 28 2a 64 61 74 61 | 48 61 6e 64 6c 65 29 2d |e((*data|Handle)-|
|00001fc0| 3e 63 6f 6e 74 65 6e 74 | 50 69 63 74 75 72 65 29 |>content|Picture)|
|00001fd0| 3b 0d 0d 09 45 6e 64 55 | 70 64 61 74 65 28 74 68 |;...EndU|pdate(th|
|00001fe0| 65 57 69 6e 64 6f 77 29 | 3b 0d 0d 09 53 65 74 50 |eWindow)|;...SetP|
|00001ff0| 6f 72 74 28 73 61 76 65 | 50 6f 72 74 29 3b 0d 7d |ort(save|Port);.}|
|00002000| 0d 0d 0d 76 6f 69 64 20 | 43 61 6e 74 4f 70 65 6e |...void |CantOpen|
|00002010| 28 76 6f 69 64 29 0d 7b | 0d 09 52 65 63 74 20 72 |(void).{|..Rect r|
|00002020| 3b 0d 09 57 69 6e 64 6f | 77 50 74 72 20 74 65 6d |;..Windo|wPtr tem|
|00002030| 70 57 69 6e 64 6f 77 3b | 0d 0d 09 53 65 74 52 65 |pWindow;|...SetRe|
|00002040| 63 74 28 26 72 2c 20 31 | 35 32 2c 20 36 30 2c 20 |ct(&r, 1|52, 60, |
|00002050| 33 35 36 2c 20 31 33 32 | 29 3b 0d 09 53 65 74 50 |356, 132|);..SetP|
|00002060| 6f 72 74 28 28 74 65 6d | 70 57 69 6e 64 6f 77 20 |ort((tem|pWindow |
|00002070| 3d 20 4e 65 77 57 69 6e | 64 6f 77 28 20 28 50 74 |= NewWin|dow( (Pt|
|00002080| 72 29 20 30 4c 2c 20 26 | 72 2c 20 22 5c 70 22 2c |r) 0L, &|r, "\p",|
|00002090| 20 74 72 75 65 2c 20 64 | 42 6f 78 50 72 6f 63 2c | true, d|BoxProc,|
|000020a0| 20 28 57 69 6e 64 6f 77 | 50 74 72 29 20 2d 31 4c | (Window|Ptr) -1L|
|000020b0| 2c 20 66 61 6c 73 65 2c | 20 30 4c 29 29 29 3b 0d |, false,| 0L)));.|
|000020c0| 09 54 65 78 74 46 6f 6e | 74 28 30 29 3b 0d 09 4d |.TextFon|t(0);..M|
|000020d0| 6f 76 65 54 6f 28 34 2c | 20 32 30 29 3b 0d 09 44 |oveTo(4,| 20);..D|
|000020e0| 72 61 77 53 74 72 69 6e | 67 28 22 5c 70 43 61 6e |rawStrin|g("\pCan|
|000020f0| 27 74 20 6f 70 65 6e 20 | 72 65 73 6f 75 72 63 65 |'t open |resource|
|00002100| 20 66 69 6c 65 2e 22 29 | 3b 0d 09 4d 6f 76 65 54 | file.")|;..MoveT|
|00002110| 6f 28 34 2c 20 34 30 29 | 3b 0d 09 44 72 61 77 53 |o(4, 40)|;..DrawS|
|00002120| 74 72 69 6e 67 28 22 5c | 70 43 6c 69 63 6b 20 6d |tring("\|pClick m|
|00002130| 6f 75 73 65 20 74 6f 20 | 65 78 69 74 2e 22 29 3b |ouse to |exit.");|
|00002140| 0d 09 64 6f 20 7b 0d 09 | 7d 20 77 68 69 6c 65 20 |..do {..|} while |
|00002150| 28 21 42 75 74 74 6f 6e | 28 29 29 3b 0d 7d 0d 00 |(!Button|());.}..|
|00002160| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002170| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00002180| 00 00 01 00 00 00 02 b0 | 00 00 01 b0 00 00 00 82 |........|........|
|00002190| 35 50 7b f9 52 5c cc a4 | 40 11 20 94 c6 22 11 11 |5P{.R\..|@. .."..|
|000021a0| 1c 44 54 4a 71 81 88 a2 | 24 01 1d 92 80 00 00 a1 |.DTJq...|$.......|
|000021b0| 0e 73 61 6d 70 6c 65 20 | 73 68 65 6c 6c 2e 63 73 |.sample |shell.cs|
|000021c0| 02 00 00 00 54 45 58 54 | 4b 41 48 4c 01 00 ff ff |....TEXT|KAHL....|
|000021d0| 00 00 54 45 58 54 4b 41 | 48 4c 01 00 ff ff ff ff |..TEXTKA|HL......|
|000021e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000021f0| 00 00 a5 71 1c dc 00 00 | 20 df 00 00 03 32 f7 c2 |...q....| ....2..|
|00002200| 31 8c 65 28 c6 31 8c 63 | 18 c4 05 38 87 f9 51 52 |1.e(.1.c|...8..QR|
|00002210| d0 80 01 f9 fc a5 29 fc | 0f d1 24 24 44 49 ae 81 |......).|..$$DI..|
|00002220| 78 a6 47 e1 0a 62 84 c8 | 01 12 28 61 e8 88 00 00 |x.G..b..|..(a....|
|00002230| 03 f0 63 ff c4 08 80 05 | 2d 14 84 02 00 22 14 40 |..c.....|-....".@|
|00002240| 61 03 08 90 be 20 02 45 | 2a 28 60 86 10 86 18 34 |a.... .E|*(`....4|
|00002250| 42 0c b0 c1 0d 00 88 84 | a2 a9 44 44 24 00 11 8c |B.......|..DD$...|
|00002260| 23 f4 8c 53 86 23 18 c6 | 30 72 45 4a a2 44 8a 80 |#..S.#..|0rEJ.D..|
|00002270| 44 8a 08 4b 0c 31 8c 63 | 18 c3 ff ff e5 28 c6 31 |D..K.1.c|.....(.1|
|00002280| 00 00 00 1e 00 00 1c 69 | 01 3b 00 00 00 00 00 00 |.......i|.;......|
|00002290| 16 7e 01 0f 00 00 00 00 | 00 00 19 76 01 26 00 00 |.~......|...v.&..|
|000022a0| 00 00 00 00 00 40 00 02 | 00 26 00 00 15 de 01 0b |.....@..|.&......|
|000022b0| 00 e2 3a 74 00 00 17 72 | 65 73 75 6c 74 49 6e 66 |..:t...r|esultInf|
|000022c0| 6f 2e 75 6e 69 71 75 65 | 43 6f 6c 6f 72 73 00 18 |o.unique|Colors..|
|000022d0| 00 00 16 57 01 0d 00 e2 | 3a 64 00 00 09 6f 72 69 |...W....|:d...ori|
|000022e0| 67 69 6e 61 6c 20 00 00 | 00 04 00 06 00 04 00 00 |ginal ..|........|
|000022f0| 00 0a 00 09 06 47 65 6e | 65 76 61 00 00 00 01 30 |.....Gen|eva....0|
|00002300| 00 0d 00 00 01 78 00 00 | 01 7c 09 00 00 00 31 20 |.....x..|.|....1 |
|00002310| 6d 61 69 6e 00 00 02 c1 | 00 00 02 ca 0f 00 00 00 |main....|........|
|00002320| 32 20 4d 61 69 6e 45 76 | 65 6e 74 00 00 00 05 51 |2 MainEv|ent....Q|
|00002330| 00 00 05 5c 11 00 00 00 | 33 20 44 6f 4d 6f 75 73 |...\....|3 DoMous|
|00002340| 65 44 6f 77 6e 00 00 00 | 07 f6 00 00 07 ff 0f 00 |eDown...|........|
|00002350| 00 00 34 20 44 6f 43 6f | 6e 74 65 6e 74 00 00 00 |..4 DoCo|ntent...|
|00002360| 08 38 00 00 08 41 0f 00 | 00 00 35 20 44 6f 43 6f |.8...A..|..5 DoCo|
|00002370| 6d 6d 61 6e 64 00 00 00 | 0a f9 00 00 0a ff 0b 00 |mmand...|........|
|00002380| 00 00 36 20 44 6f 46 69 | 6c 65 00 00 0e 77 00 00 |..6 DoFi|le...w..|
|00002390| 0e 7d 0b 00 00 00 37 20 | 44 6f 45 64 69 74 00 00 |.}....7 |DoEdit..|
|000023a0| 0e 95 00 00 0e 9b 0b 00 | 00 00 38 20 44 6f 4f 70 |........|..8 DoOp|
|000023b0| 65 6e 00 00 1c ce 00 00 | 1c d8 0f 00 00 00 39 20 |en......|......9 |
|000023c0| 53 65 74 55 70 4d 65 6e | 75 73 00 00 1d ea 00 00 |SetUpMen|us......|
|000023d0| 1d f6 11 00 00 31 30 20 | 53 65 74 55 70 57 69 6e |.....10 |SetUpWin|
|000023e0| 64 6f 77 73 00 00 1e 08 | 00 00 1e 15 13 00 00 31 |dows....|.......1|
|000023f0| 31 20 4d 61 69 6e 74 61 | 69 6e 4d 65 6e 75 73 00 |1 Mainta|inMenus.|
|00002400| 00 00 1e 27 00 00 1e 33 | 11 00 00 31 32 20 55 70 |...'...3|...12 Up|
|00002410| 64 61 74 65 57 69 6e 64 | 6f 77 00 00 1f 88 00 00 |dateWind|ow......|
|00002420| 1f 90 0d 00 00 31 33 20 | 43 61 6e 74 4f 70 65 6e |.....13 |CantOpen|
|00002430| 00 00 01 00 00 00 02 b0 | 00 00 01 b0 00 00 00 82 |........|........|
|00002440| 00 5d 5c 98 0b 06 00 00 | 00 1c 00 82 00 04 42 4b |.]\.....|......BK|
|00002450| 50 54 00 00 00 2a 44 54 | 56 55 00 00 00 36 45 54 |PT...*DT|VU...6ET|
|00002460| 41 42 00 00 00 42 45 46 | 4e 54 00 00 00 4e 4d 50 |AB...BEF|NT...NMP|
|00002470| 53 52 00 00 00 5a 11 72 | ff ff 00 00 00 00 00 00 |SR...Z.r|........|
|00002480| 00 00 0a bc ff ff 00 00 | 00 22 00 00 00 00 03 ec |........|."......|
|00002490| ff ff 00 00 00 66 00 00 | 00 00 03 eb ff ff 00 00 |.....f..|........|
|000024a0| 00 6e 00 00 00 00 03 ef | ff ff 00 00 00 7c 00 00 |.n......|.....|..|
|000024b0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000024c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000024d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000024e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000024f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+